for (country in c('indo', 'colo')) {
  v = 'count'
  source(paste("config_code/",country,"_data_setup.R",sep = ""))
  source(paste("config_code/",country,"_dependent_vars.R",sep = ""))
  
  pdf(paste("graphs/", country, "_hist.pdf",
            sep=""),
      width = 7, 
      height = 7)
  
  hist(dta[dta[,dv] < 50,dv],
       breaks=20,
       xlab = 'Violent Events',
       main="",
       xlim=c(0,50),
       freq=FALSE)
  dev.off()
  
}
